llHtllttMiMMttf 



N 



ee 






ee ae 



W 



" IMIiltmiMiMfllM<MM«»MIM»Ml.»MI«imiIMMMII 

MMMMM IIM*>tMMtMM«*MM»Mf»ttl*MMIMtM»tt>M«MMIlMI «•■■«•*•■■ !•••■ 

N 

Mm mm m 

8 mn mm m 

88 00 ee mm m 

8 ee ee w nn m 

ee ee oooooooooooo MM m m 

ee ee nn nn * 

Op w NN NN NN 

ee ee nn 



m mn 


M 


uu m 


M 


m m 


M 


w M 


N 


UN HU 


N 


«W * 4- 


ee 


kkU NM 


ee 


UUUN MM* 


N 



NN 



I4i 



h ee 

.•■■.MMIMIUMM tiMMMIIIMIiinMIIM.niHH.inMIPXHHMMIII IIUMMMIHII 

MlIIMMIMIflMMIIIIMllllMIIIIIIMMlilMMMIMIIilMtMMIIIIilHIMlllllllMlIOMIMMIIIIII 

M 8ft-N0RTHMEST N 

m n journal for TK-ee users ee 

••ooooo<xxx><x>o<x><x>o<xxxxxxx>ooo<xxxxxxx>oooo<>oo<>oo<x>ee 

MVOL 111 ti« PER VEHR SEP-CCT 1979 N 

M *♦ ♦♦+»♦♦♦■»■♦+♦■»♦♦♦ »♦ »♦ »» M > ♦ ♦ ♦ »4 M ♦«■»■» *4 f4+* ♦ > ♦«»»»» »* » ♦+ >♦ * ♦ » ♦♦' 



— IN THIS ISSUE — 



-|M OUR NEXT [SSUC LOOK RJP- 



THE INTERACTIVE LEVEL I KEVWRRD PflGE 12 

BV T ROSENBAUH - HON DO VOU INTERRUPT A 
rROGffff DURING EXECUTION RNC* CHPNQE ITS 
OUTCOME") TOW TEL1S U5 HOW 



ADVANCED CflPTURE 
HERE IS fl FINE EXAMPLE OF LEVEL I 
INTFWTIVf KEVttMRD IN ACTION 



*CE 13 



THE VIEW FROM THE TOP OF THE STACK 
THE START OF fl SERIES OF MACHINE UWRGE 
PROORflHHING LESSONS 

fl NfilL LIST/5CRT PROGRAM L2 ANt> DISK 
FAST SORT ON ALMOST ANYTHING IN THE 
ADDRESS LABEL - CREPT FOR BULX NAIL 
SORTS BV CITV, STHTC m>AX ZIP CODES 



A FILE HNNftBEHEHT PROGRAM PACE 8 

FOR LEVEL II WITH OR NITH0U7 DIS* M> 
PRINTER SHOMS AH APPLICflTION OF 01* 
BftStC SEQUENTIAL FILE HANDLING AND CAN 
GE ADAPTED TO MANv OTHE* USES 

QMOST SUB PAOE 5 

ft CHALLENGING QANE. COMPUTE WITH 
GRAPHICS AND H PEW. TV FOR DCflTIMO' 
JUST FITS INTO 4 K 

SLOT MACHINE - LEVEL I OR II PftOE 4 

R LEVEL I GWE (RUNS OX IN LEVEL 1 1 
ALSO) WHERE VOU CflN LOSE VOL* MONEY. 
THEN HIT PUN AND 00 IT ALL AGAIN 



EDITORIAL CattN T 
UNCLftSSIFifv At* 



PffiE 3 
PflGE 15 



BIORVTHfl PROGRAMS 

HITN fl CHALLENGE TO PROVE IF THERE IS 
REfUV SOMETHING TO IT ALL LEVEL I 

TALK TO VOUR PRINTER 
HON TO mn WHAT APPEARS ON VOIR StSEEH 
HAPPEN CM THE PRINTER LEVEL 11 fl ITI STUFF 

CONVERT VOUR TRS-9e TO UPPER/LOUEP CflSE' 
HE BRENT TALKING VET. BUT HRTCH HHBT 
HAPPENS IN OUR NOVHJEC ISSUE" 

THE COMPUTERIZED BOHLINQ HLLEV 
ANOTHER GREAT LEVEL I INTERACTIVE rEVBOflRD 
PROGRAM WHEREIN VOU CAN SEE VOUR HOOK BfiLL 
BRE* AT RANDOM 

PUIS OTHER OOOOIES 
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Sfr-NOrTHCST U1LL ACCEPT LIMITED- CCIFVEHT 
COtCRCIAL WWRTISIW <NUST R©T*IH TO OR FOR 
U5E HIT* TRS-88 HlCRO-COmnE»> SRHCE IS SOLD 
BV ONE CUFTEP PWt fflF PAS OR FULL PfiGt 0N.V 
PRICE PO JMSCFT1W IS 125 FOB QUHPTER PRGE 
138 PER HALF PflGE AMD UBR PER FULL P*GE E«* 
WOIflONR INSERTION OF SflHE flO IS REDUCED IN 
PRICE evSt «T TO EWffD ft TOTHL DISCOUNT 
OF » TWT IS. TIC Srt€ flO RUN FOR OK YE*, 
(SIX ISSUES) UOJU BE DEDUCED BV J8J3C 



MDOBESS %i lNQUIP!EVCfllWE9<IOe«E TO 
T>C BMOTHCST JOURNAL 

PO BOX 7112 

TBOfft ttSHIMCTON »48? 



-ATTENTION USER 0R0UPS- 

TT5-6R USER GROUPS wv SEND PARTICULARS OF 
THEN MEETINGS RJ© REPORTS OF TKIP ACTIVITIES 
FOR FREE PUB-IOniOM IN T>€ 8MOm«ST JOURNAL 
SE» TO MHOTTHCST 
POBBX 7112 
mm- WSHIHGTW 90407 



-MP 1 TEFS/CONTR|BUTt*S- 

T>€ BR-NORTHMEST JOURNAL IS SEEKING HATERIR 
FROM LITERS SEND US VOUR TRS-8B RELATED 

HRTERIflL PROGWWS. LISHIOS. ARTICLES OR MHflT 
*¥£ VOU (EXCEPTING PREVIOUSLY PURISHED) 
AHV WORT <0R LONG) PROORATV HCCfffflMlET' BV A 

SUITABLE DESCRIPTION MILL BE HPPHECmTED 

if vou mm vou ormtt mritf. send IT HNYWV. 

WE MILL EDIT AMD GIVE VOU CREDIT VOU HW SEND 
PROGRRHS OH CASSETTE <LEYEL I OR IP OR ON DISK 
CftSSETTES WD DISKS HILL 8C RETURNED PROVIDE 
RETURN P05TRQE 

HUHOftOUS ARTICLES NBV RLSO BE SUBMITTED 
DOT SEND VOUP •PET" PROJECT. RATHER H*E IT 

SUBMIT VOUR WTTERIft TO 88>-N0P7HMEST. PO BOX 
7112, TflCOMR MP SW87 - IF VOU MPWT VOUR 
Mt&ltL RETURNED. INCLUDE A SELF ADDRESSED 
ENVELOPE PH> SUFFICIENT POSTflflE 



C 1978 8R-N0RTHCST PUB. 1 94 tW 

EDITW-n«U5HtR 

HIKE SO*I0T. 3118 N UST ST- THDflHM MB 9*487 



SOLD BV 5USCRIPTI0M ONLY 

PUBLISHED 01-MOOTHLV 

SU5OHPTI0M RATE IS U£ PEP VEflR 



-NHAT. ANOTHER COMPUTER magazine-*- 
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MHV WP IC FEEL THERE IS ft REAL NEED FOR A 
VD4ICL£ TO EXCHANGE TRS-» INFORMATION ONE 
THAT IS DEDICATED DttLUSI>*LV TO THE TRS-BB 

FOR DWfflL ONE OF THE BIG NATIONAL PUBLICA- 
TIONS JUST 00T AROUND TO TELLING US «0UT THE 
REALLY GREAT LEVEL I MANUAL - IN THI1R AUGUST 
1979 ISSUE' WELL, WE AGPEE THAT THAT MANUAL IS 
TOPS. BUT HOST OF US PRE fl LOT FARTHER KMN THE 
ROAD THAN THHr IT IS EASY TO UNDERSTAND I* 
LARGE LEAD TjrCS REQUIRED BY TIC BIG 0UV5 IT 
SOFT OF DOES THEN IN. SO TO SPEAK THIS FIELD 
15 MOVING SO FAST HE NEED MORE INFORMATION THAN 
THEY CAN PROVIDE IN R GENERA. COVERAGE PUBLICA- 
TIOH 

sore OF voa WHO are still MUTING FOR SICK 
GOODIES AS LEW. II. DISKS. PRINTER ETC • HAVE 
R REAL FUN TINE IN STORE FOR VOU THERE ARE 
SOff VERT EXCITING THINQ5 HAPPENING WITH THESE 
ADDITIONS TO THE TPS-88 AMD HE CERTAINLY PLAN 
ON WINGING VOU R5 MUCH INFORMATION «S WE CAN. 
AND AS SOON AS HE CAN 

FOR EXAMPLE- THIS JOURNAL IS BEING FORMAT- 
TEI> AND PRINTED ON R TR5-4B WITH 4«C OF MEMORY, 
WITH TWO DISKS AND THE LINE PRINTER AU OF IT 
IS STOCK TR5-BB THE SOFTWARE TO DO IT (ft VERY 
RUDIMENTARY TEXT EDITOR) IMS GLOWED TOGETHER 
IN R WEEKEND. FROM SCRATCH, NO LESS PERHAPS IT 
IS NOT TOO ELEGANT. BUT IT WORKS* 

THIS 15 NOT THE 0M.V SUCH SYSTEM AROUND THE 
AREA THERE ARE SEVERR MORE (EVEN NOW EXOTIC > 
IN OUR NEIGHBORHOOD THE POINT BEING THRT THERE 
HAS BEEN R RATHER SHRRP "LEARNING CURVE" AND WE 
CAN P«SS ALONG NVCH OF OUR EXPERIENCE VIA THI5 
JOURNAL - - -NE DO NOT INTEND FOR IT TO BE ALL 
ONE WW THOUGH BECAUSE WITHOUT VOUR SUWT 
HP© INPUT ME HILL HITHER ON THE VINE WE UANT 
TO KNON WHAT VOU ARE DOING TOO 

ME NANT TO DESIGN THIS JOURNAL SO THRT VOU 
HILL FIND AT LEAST ONE GOOD PROGRAM OR NJfVBE A 
HELPFULL TRICK OR TUX WHICH WILL REPAY VOU YOUR 
SUSCRIPTIQN PRICE HE DO NOT REAUV INTEND TO 
BE fi NON-PROFIT 0WANT2ATION. AFTER ALU WHEN 
VOU PFTY NOTHING, VOU GENERALLY GET JUST THAT. 
NOTHING OUR PRIMARY GOAL IS TO SPREAD THE 

INFORMATION, PASS ALONO GOOD SOFTWARE AND HARD- 
WARE ARTICLES AND ACT AS AN INTERCHANGE BETWEEN 
ALL TRS-W ISERS OUR SECOND GOAL IS TO HRVE A 
LOT OF RJN DOING IT* 

SO LETS DO IT- THE TRS-W IS PROMBLV OX OF 
THE 8IQ0E5T SELLERS IN THE NICKO-COMPUTER FIELD 

THERE HAS TO BE A LOT OF VARIED AND INTERESTING 
APPLICATION OOING OH OUT THERE LET US HEAR FRO* 
VOa AND WE HILL BUST OUR BU6 TO GET VOU A 
FIRST CLASS. INFORMATIVE AND DEDICATED JOURNAL 



ME WILL NOT 5P8© THIS MUCH SPACE FOR EDITOR- 
IAL IN FUTURE ISSUES THE FRONT PAGE HILL CONT- 
AIN AN INK* AND SOAE IDEA OF CORING FEATURES 
BUT IN THIS. THE VERY FIRST ISSUE OF 8B-NORTH- 
UE5T. HE MOULD LIVE TO PRESENT SOW OF OUR IDEAS 
FOR THINGS TO CONE 

FIRST OFF. Iff DO NOT LIKE 'CONTINUES' ARTICLES 
OR COLUMNS- SO WE WILL TRY TO HAVE NONE 
ARTICLES MILL START FROH THE FRONT AND QO RIOHT 
OH TILL THEY END WHENEVER POSSIBLE HE HILL 
GIVE COMPLETE LISTINGS OF PROGRAMS IN TRS-BR 
LEVEL I OR II BR5IC VOU WOULD BE ABLE TO 

COPV THEN DIRECUV HI HILL DEVOTE CONSIDER- 

ABLE SPACE TTj LEVEL L SI«E THESE ARE MARY QF 
VOU WHO DO NOT VET HAVE LEVEL II WE WILL ALSO 
HAVE SORE HARDWARE ARTtaES. BUT Bv FAR NONE 
SOFTWARE AND APPLICATIONS THAN HARDUARE 

VOU -KLIHOON KILLERS* WILL NOT BE FORGOTTEN. 
ThCRE HILL BE GATES < SUBMIT VOURS AND WE WILL 
PSfBARV PRINT IT) THERE HILL ALSO BE A CLASS- 
IFIED SECTION WHERE VOU NAV BUY. SELL OR SNAP 
DISK BASIC FANS MILL FIND ARTICLES OF INTEREST 
AS MILL THOSE OF VOU MHO ARE CONTENPUTTING 
MAKING VOUR OMN SEIECTRIC INTERFACE FOR THOSE 
WHO LIKE MACHINE LANGUAGE WE HAVE A DIS-ASSEHB- 
L£R WHICH MILL TAKE APART THE LEVEL I OR II ROM 
AND PRESENT IT IN ASSEWLV LISTING, WITH 2IL00 
7-9B MNEMONICS YFP IT MILL ALSO TAKE APART ANV 
PROGRAM VOU NAV HRVE IN MEMORY HE WILL GET 
INTO THAT THEN THERE IS THE RS 212 INTERFACE 

COMING UP THAT SHOULD SE INTERESTING AND ME 
HAVE SOMEONE WORKING ON THAT RIOT ROM AND HE 
HILL REPORT HIS FINDINGS. LIKELV AS AN ARTICLE 
THEN THERE IS fi NEAT TRICK FOR PRINTING FROM 
THE KEYBOARD DIRECTLY TO THE PRINTER. WHICH JUST 
COPES IN HANDY WHEN USING THE D1S-ASSENBLER ME 
MENTIONED ABOVE. SINCE VOU CAN LIST THE CODE 
DIRECTLV FROM THE SCREEN TO THE LINE PRINTER 

WE WOULD LIKE TO MENTION ALSO THAT ME ARE NOT 
JNHNY MAY CONNECTED MI TH RADIO-SHACK ALTHOUGH 
IN A WAV THEV HAVE MADE THIS JOURNAL POSSiaE 
OR NECESSARY. HOWEVER VOU LOOK AT IT 

WE HOPE THIS JOURNAL HILL FILL A NEED ME 
THINK IT HILL VOU MILL CERTAINLY WANT TO HAVE 
EVERY ISSLt 90 OCT VOUR 5L5CS1PTI0H IN NOW' 
AND THEN CONTRIBUTE' PASS THE GOODIES ALONG' 
VOU HILL FEEL BETTER IF VOU PASS VOUR •FLASHES 
OF GENIUS* OR •NAJIK" ALONG FOR OTHERS SITTING 
ON [T MILL NOT GET ANYONE FAR - SO 
ME HOPE VOU HILL ENJOY OUR FIRST ISSUE IRV. 
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li RBI SLOT rwCHI* 

20 PRINVTMJS SIMULATES B » CEWT SLOT HMUC" 
» PR1NVUINNIM0 COBINmiOWS nc a 

a m«T*M 3 BWS « OP •• 3 ORMES •• OR m 3 CHERRIES ••• 
99 PR|NT'HOM W*V W CENT PIECES W VCU HRHT TQ PUW* INPUT* 



71 fM» 5 

8B PRIWrVOU START WITH IMI 

99 PRINT INPUT-PULL THE LEVER BV PUSHING ENTER" 

IM PRINTPRIWT PRINT PfclNT PR3NT PRINT PRINT 

U3 >2*1 

L2t M 0* CH 

158 raoHia 

16* !MStK3) 

171 IF H"?THOCie 

in if MimM 

18* PRINT- iiiii BRRm 

190 M** 

29* 0QTOM9 

211 PRINT R A H G E 

22* 0-OM 

2M 00TC269 

249 PRINT CHfMV 

Z3t C-C*i 

xs nexti 

271 IF N7TWM» 

3M if o-rooos* 

M if coneoa 

3tl PRINT PRINT PRINT' V U LOSE* 

Itt H*N- 3 PRINT 

33* IF N-9THEWW 

34« omom 

33» PRINT PRINT PRINT" • • YOU JUST WON f 1 99" 

36* tMH2 

371 PRINT 

399 PR1NTY0U NOW HAVE t' n 

W9 G0TOJ9 

48» PRINTVOU HRVE LOST ALL YOUR HDNEV 

410 PRIHT-BUT VOU OUT TO RU DC H»Ua* 



Z* # THUS 1- SW 



-SLOT PROOR* - LEVEL I - <K - 

HEK IS ft PROGRflPl FHRT HAS BEEN KICKING 
AROUND FOR SOW TIME * KW'T KNOW FOR SURE 
MR IT Off FROi BUT IT IS FUN 'FOR MULE). 
ANYHOW LEVEL I USERS CflN SIHRV TYPE IT IN 
M RUN TO SW SWDi THOUGH, VOU HJOfT tfWT 
TO ABBRTEVTflTE. USINO TW STANWRD LEVEL I TYPE 
ABBREVIATIONS 

THE REASON THE PRINTOUT MRS NO ABBREVIATIONS 
IS THAT LEVEL II MRS NONE <0* FEW) WE ARE 
CONVERTING LEVEL I TAPES TO LEVEL II AND T>€N 
SIMPLY PRINTING TMEJ1 ON IHE LINE PRINTER 



USING THIS NTTMOO 'WHICH IS THE ONLV WPV WE 
OH QET R LINE PRINT HOU) GIVES « VPLIO LEVEL I 
LISTING IT NAY OR NHHY NOT RUN ON A LEVEL II 
MACHINE If T>CV KK'T RUN ON LEVEL IT WE HAVE 
FOLK THRT ONLV MINOR CHANGES NEED BE riADE 
FW FUTURE REFERENCE - LEVEL I U5ES THE *RT* IN 
•PRINT AT* STATEMENTS LEVEL II USES THE "f IN 
■PRINT •• STfiTEWnS ALSO. LEVEL I REQUIRED A 
SOIICaOH AFTER THE "NT" BUT LEVQ II WPNTS A 
CONNR AFTER THE f SO - - - WHEN VOU LEVEL I 
PERSONS FIND AN t» * IN OUR LISTINGS. SIHPLY 
CHANGE T>0 TO Iff. - AND VOU ARE IN BUSINESS' 

UE WILL BE REPEATING THIS FRO* TIHE TO TINE, 
SIWCT HORE OF THIS CONVERSION HILL BE CONING 



-CHDST SUBHPRINE- 

LEVH. I. W23 BYTES ALSO MILL WORK MTTH SOME 
CHANGE ma. II JUST FITS fl 4 K HACHlNt MTTH 
A LITTLE EFFORT IT COULD BE HADE SOMEWHAT SHBU- 
ER SINCE THERE ARE SPAC£S WHICH COULD BE LEFT 
OUT AFTER HOST OF T>C LINT NUMBERS 

LEVQ. I USERS 9*JUU> PflY ATTINTIQN TO T>€ 
"PRINT #, ■ AND CHRMQE THEM ALL TO "P AT. • AND 
WILE VOU ARE AT IT, RIGHT AS NELL USE ALL T>C 
STANDARD LEVEL 1 ABBREVIATIONS TO SAVE EVEN 
riORE TlfC AND SPACE 

THIS IS ANOTHER OF THOSE 'ORIGIN UNKNOWN" 
PROORAHS WHICH SEEN TO RflHE THE ROUNDS IT 15 
NOT TOO ERSV TO BERT. BUT IT CRN BE DOME 

THERE ARE SEVERAL NICE INNOVATIONS IN IT. 



80-rvw Bep-oot 7B 5 

5UCH AS THE FLflSMINJG FEATURE, AND Tffi GRAPHICS 

PLOTTING IS REFLLY QUITE ADVANCED FOR LEVEL I 
CAPABILITY T>€ -PLOT V/N* IS INTERESTING AND 

THE PEWLTV FOR USING IT IS THE LOSS OF ONE OF 
YOUR HISSLES' THERE ARE TIMES THOUCK MHEN VOU 
JUST DO NOT HRVE HUGH CHOICE BUT TO USE IT 
LEVEL 1 1 USERS HILL NEED TO PBV ATTENTION TO 

nt -pRiNrr also, Sim curing conversion from 

LEVEL I TO II SOME CHANCE AND SOME JUST DON'T 
USUALLY THE PRINT • NILL CONVERT FROM A SEH1 - 
COLON TO H COHAN, BUT NOT ALMA"* ALSO LEVEL 1 1 
USERS MILL NEED TO CHANGE THE STATEMENT IN LINE 
20 OR YOU HILL GET A SYNTAX ERROR SUOOEST YOU 
USE A STRING VARIABLE THERE AMD LXT ^•VES* AND 
N--ND- BE CAREFUL YOU DON'T SHOOT YOURSELF" 



6 OS 

10 INPVTHELLa MNRT IS YOUR NAHEMW 

15 PRINT PRtNT-0 K ". A»; *. ME ARE OOIHO TO PU*Y QHOST-SUB " 

2B PRINT W INPUVDO VOU NKD INSTRUCTIONS V/ITjA 

25 IFA-VTNPG8 

26 QOTOiee 

3B 0_S PRINT PfilNTRi. -. THE OBJECT OF GHOST SUB IS TO LOCATE AND DESTROY THE* 

39 PRIMVOHOST SUB BEFORE YOU RUN OUT OF RISSLES ' 

46 PRINT PRINT-VOU MIU HAW 7 SHOTS. AND THE SUB HILL WOVE BETHEEN" 

45 PRINT'© AND 5 HILES PER 9CT ■ 

50 PRINT PRlNT'flFTER EflCN SHOT. YOUR Oh-SOAPD COMPUTER KILL CflLOJUnE' 

55 PRINT'YOUR ERROR DISTANCE. VOU HUST BE MITHIN 5 HILES • 

£0 PRINT"TO SINK THE WOST SUB FOR EACH SHOT VOU NUST SPECIFY" 

«3 PRINT'BOTN TNT RANGE (FROM 2 TO "3 NILES)- 

PRINT-flht THi ANGLE (FR0T1 B TO 368 DEGREES)* 

PRINT" IF VOU CHOOSE TO PLOT THE SUB'S LOCUTION, YOU LOOSE ONE HISSLE" 

PRINT INPUT-HIT ENTER WHEN YOU ARE READY*. Bf 
FOflN«lTO» CLS'PRINT*212. "CONDITION" 
PRINTHW, 'ALERT* 

PRINT»7"88. "QHOST SUB IN RANGE" 



76 
75 

86 

iee 

ne 

129 
125 
130 
148 
145 
148 
1*36 
165 
168 
178 
172 
175 
188 
i'v 



C*7 

mO-ilttl NEXTD NEXTA 

IMMCSTO IFX<2TMEN14« 

VHWD(368> 

G05UB9829 

G0TO495 

IFV>23PRINTtl75- "OWR-RANGE 

IF<V>2>THttl75 



m 



Q0T0321 



F«<X«X>*<V*V> B-flBS<V-W> 

DOMM 

H-F-<2*X*V*P> QDSUB15B8 

aoroM 

F0WMT025* NtXTW OS GOSUBBBBB 

0091)9026.05 FRINTKlfc "MST SUB DeSTROVED' 
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29i H tW fT'fJt MIST SUB U3CMTTCM MS "X • WILES' 

(F '.V,' 
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FtinTti^ mirrtiTi 

P»IMTfl?5 RMMI P*IWT?3?1 

""■tmtcb petto*. o> fwmtm* ten* set (to Fwr*iTa» *xtr icxr* 
p*i*th& *wwvv. tiilIS" 

SQ PRIMTtlTS. "TOTES" 

m hunto** -oftop distiwx* 

as winmn a **zi£5 - irocTnecs 

ck mama fun v^r. iiwm iFW"*ne*Li 

ttfl QOTDOB 

til PSMHMVM 

U2 KJ QOSUBlMt fr» J UMjUUVN 

4SJ Hli»»O^Hi f*2»^»S*0 «l>«WUft<l>> M2>-tHTCfK2)> 

&14 tr<mi»»«>^iKi><t>«<iic2»47)*<AC2><i)neMXTj 

US VCDVttTIOBi 
CM SETCtKl>.M2)) «XTJ 
» C-C-i 

f* PtlPfTf 496. -vai WW ' c 
649 iFcincwfie 

69* HUNTf56fc TIIS5U5 LEFT* QOTOCM 

mi nunrm *n\ssu an* 

«7* FOB^ttrnf PfiirfTKtt. tomTian mr 

(73 Rx?nroa» «rc wiwmw rkt«itq9i ten? rcxn 

at tm*twmmxm 
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MXT ft B» 
CflSIftf 9MQUT1IC 
t-etTTI 00SB2MI ft-t-S 
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trick vow cfw use to n t 

IT CMflTO AFU9H 

m wane uctt- 

MM. SUW MS I MP 1 M TtMHriW Mfr" ]T 
COULD ftLSO K USD IN ftNV BUSIM5S I M MWI TO 
OU ATTtNTlW TO TIC WOWTM D€ KME* OF 
TIMS 10 Win. TYC » TIM, AM fff TIM. Ml 
Hi. 4MIMK.ML1 IXML It UBBB *IWT «U Mi 
A 00*Z3)> n» EFfTTT 

um«uKii.».aM»wuiMc if w com* 

M CL$ rttMT-niBHlW £>I»W 

3t IMVT -GfTf» • (7 TlfCS TD WW L 



49 IMUT tKTTi* I FOR 9T TIM", ft 

» IftTVT "BITE* • FOP ON TIM OF MSMW.N 

M IHVT *BfTE* RESSAGt TO OISFUW.M 

«s m • ldc 7t orws • tucs to wear • 
m as 

71 FM **t TO L 

7} PttVT ftT 47?iM 

n «£* • LI* M 01VES I FOR OFF TIM ♦ 

M MUTT ftT €75. • 

•9 MM • LIM M ttfCS • FM CM TIM • 

3tFVMT0N *XW «XT A STOP 
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IT IS 
» TO 



II. DISK OML !IP> BNSIC «TN Ot 

ictnjnt trie «ti«w 

tS R CoHFLETE F!U NNflTTENHMCE pruumi 
BJILT 91 nC WDtUft CONCEPT SEE LINK 
M « VOU CM SEE. FllfS FBOH TAPE HNV 
A D1S AND DI5* ON TPFE IF DESIRED 
T>€ NODULAR STTir fLSD aiflMS V«U TO L0« OUT 
THOSE SECTIONS *HCN HPW NOT AFPLV TO VOLS 

mmcuff mNctm carionnncH for e*mt 

IF VOU CO NOT NAVE DISK, LENVf 11 AND tf OUT OF 

the henu and amr uatUM rum t>c "on o 
odto* srmoon in line » the sat* row hill 

imv IF VOU DO NOT HNVE A LINE HUNT** THtS 
SHOULD NOT AFFECT THE OPERNTK* OF T>€ BEHAINDE* 
OF TIC PPOCWT 

nc rroowi is set up to keep a nape hnc fmm 

NUMBER LtST J T CNN BE ADAPTED TO OTHER USES. 
SUCH « NlIC ABME95 OR 9*1 tMQffOftV USES 

nc on this im» * ncsomy set up the 

NAPE AMD PHONE NUNJRjR ABC BNTERED TOOETHEJt MITH 

NO COHC THIS SNVES 5PRCE IN NEKKV AND Ot 

DISK OB TAPE HDNtWR NHEN PRTNTEP OUT ON THE 
LINE PRINTER IT NIU PRINT LDC THIS 

NJUC JOHN » J4V47W 

(N)(U T« Mf NUMBERS IN TNE LIST MILL BE 
IN AN FAB COUfK MIT* M SPNCE5 BfTNHN 



OF 

wa LIST. 



IT 



FILLED IN MTTW IHTTFAO 

tares, autumntfcmuv rr irks r 

IC IS NO POINT IN SWING ALL 
IN UNI I ALSO. TNE LINE PRBRNJB 

stnrtirc nt lm bob. fnwrs sr names 

AND TIO LDC FEEDS S TINES THIS B W NUOl 
FON BIHDINB TNE ANDES WTO N BOOKLET THIS AM* 
K ORTTTEB. at CNJNBB RJ 1MB VNLUE5 RV 
CHAREM a IN LINE Mi NBVOR THE NUMBER OF 
IWtlNT-S W LINE Mi 

Ef TNE WUHAN IS TO H US© NTTHDUT BISKS 01 
019 BASIC THEN THE Wf'IH LDC 9 SRBUL0 
If ftttrm AS MITMOLTT Mft BASIC THIS NIU Bt 
CRUSE FOBR SWTNjr FJRSR nmHT IT 
BASIC IS TO TURN OFF TNE INTERNAL * 
AS TNE CLOCK NJLL INTBVEX NITN TIC CFWRTTlON 

or tne tape rurnoNS 
line 18 - aoit mm* - pinb*bni>-oiabb<«bb> 

NSDS TO HE CMANDED DEPENDINQ UPON HDH NUCK FREE 

aemdrv vtju hr* m vout wm nc rbm urlues 

uork at with m nith di» rmsic you amv nmnt 

TO ENTER 1ME PPOORMM MITHDUT THE OB* STNTEHEHT 
AND THEN SQ HEM NUCM HENONV VOU HM LfFT AND 
NMST TNE UK STNTDCNT AND THE DIN STATE- 
ABTT5 TO FIT LINE 95i «IU HNIAI TO NX CMMED 
TO ANTTH THE OIN S INITJ CN I ALSO IE THIS AN0O- 
RAN IS TO BE U5tt» M.V WTH DI» BASIC THEN 
THE ROUTINE IN LINES KN TO PNI COUID K LEFT 
OUT IH> THE 0I1X BTttrc CONNAND MNSTN* OK 6C 



THE mm ROUTINE STRRTTK NT LINE *i IS VOV 
rNTDRnTINt PREVIOUS TO AtlOR HI HAD R STNN> 
ARD -BURBLE SORT' NDC IT TOW 4 HOURS AND B 
HINUT6 TO SORT CN RJBjB R» PHONE NUMBS 
KITH THE AtESBfT SORT ROUT IRE. THE SANE WtKR 
OF ITEN5 SORT IN ABOUT 4 HHRJTE5 AND U SECONDS' 
THE OIFFGRBCE IN SORT ROUTINES IS ROT APPARENT 
UNTIL vOJSTNjn SORTIND HOC TMBJ ABOUT SB TO 
1M NHCS TMD* t>€ DIFFERENCE IN TINE IS NO 

LESS THAN DRAHRTIC 1 FOR THUS OF VOU HMD NEED 
TO BE CtMVlNTA. DELETE LINES W THRU 775 AND 
INSET THE 0UBBU SORT RS FQLL0H5 
73B S* N^*-l 
74B FOR il TO N 
79BNV4RMJ) 

79 BN-NBOM ' 

7CB IFNK^B THEN 77i 

»*)<;>* 

7»4 N<HMI 

7C9 Sn 

770 NEXT J 

m If 9-1 THEM 7M 

PLAN ON VISIT INB A DISTANT FRIEND NH1LE THE SORT 

IS RBNnBB (BUBBLE THNT 15' 

3-TO SS m WrVtBURl FILE - IS NHTHTJ MICE 
TOO FT USES THE INSTRINO FUNCTION TO LOCK FOR 
A UNIQUE CCPBtNRTION OF CMARNCTERS SINCE TWIT 
IS TRU. VOU CRN SB HON HNW 'JOHNS' THBC AC 

ALSO PULL OUT AU THE 

VOU CRN ALSO PULL OUT 

NHIOt START NITH 

SCS-WO" TNE 



IN VOUf LIST. RUT IT NIU 



OF VOUf LIST ALL 
A GIVEN NRQFTJt FOR 



INTU R WU OA VOU WVE THE IN5TRM FWCTWN. THE 
NBHE 5B-ETT1VE IT NIU RE IN PUUtNB OUT NRNES 
IF VOU tTW IT R COCIETT PNDNE RUNJBL IT NtU 
PI9UC FTJR VOU THE RNJf THNT U0E5 NITH THNT 




TO THE FILE HILL PUT fit* ALL NT 
THE ENI OF THE FILL NRD VOU RNT THEN HI* TO 
ACRE ANOTHER SORT SINCE THE SORT IS FAST. THIS 
9CRJD RE NO PROBL0I 

OEUTINO A NAM FRON THE FIU DOES NOT OWE 

A BLINK » TMTT 5PHX BUT CUBES THE FILE U?. 
SO THNT THBC ARE ND BLANKS IT ALSO REDUCES 
THE NUMBER OF ITERS (N OR Pt-SENTINH. NUNBERS) 
TO HNTCH IF VOU INK N CtNREETIOR HND SIHFLV 

PUW ENTBL THEN THERE MILL RE R BLANK IN THNT 
SPACE AND N SORT UTLL ROUE IT TO THE TOP OF THE 
LIST- SINCE R NULL STRING HN5 THE LONEST vRUE 
NTCN DELETING AND ADOIND NNJCS VOU ANV MRNT TO 
l« THIS rtNTLNE. AS IT IS AUCH FRTTER END 
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05 DU MIW I DlWd 



22 WW 

» WWTWt i-ro WILD * f Of 

«• Ftstrrwc ?-n> ss nc Brrnc fiu - 

9 wrmrrwc >-n> so ai Ofcrvm* fiu* 

m mnrvm *-n> mn ta w a i w 

79 W IT M WC 5-TTJ 9K CHBBTT FIU <M UTE* 
M nr»T*TWI C-fO BWf ft FIU FtW TPFE- 

» wiw r w *-td son fei iwHamcair 

04 rtWTTW »-T0 WW? U5T Of LUf WIKTEF* 

ts pcmrrwc 9-ro m> mrcs to foe* 

u miT-vm i*-to obxif a mc fww file* 
v marrm u-td sk file » bit 

M H UW ' W U-ro UM> FIU F*W Dl»* 

» iicvt owe qdto *»»«im«i.mm«»ii»uin« 
im nfur*iMi mm. mss smm oh nu m zzzz m hbd'-x 

lit «t 1-lTCMt OS 

ui ptwentt mmts mbc i mi nan coww 
u2 wwncx «* ewtbi »r. tmit m<\> 
us if ■KiK*zzzrim n-i aorom 

135 IT FKCSVXHMmOi 

MM 

19 WWTIU CUB*-" HWT-TTJ SE TIC 4BU RW BfffT.x 
m G0TQ29 

an as FotiiTon nts«r»<s> itaa 

at wur*rs sb nc *m nsi ener.x arrow 

Mi OS WWEKW *ff (FIRST OR LAST) Qt KIWiVI 

H« FVI-lTaPl ^^ 

112 IF »«>«-ZZZ?TICl*«I4T-at> OF list, twc t Fat mohb ■«. t Fflt IBtf, n*uTi€LSSI 

S4 IFfc-iTMHt &5E3I 

91 F0«« fOOOKWl))-L0lfW>*V 

n rFvt-nrw<i»(i>.J.LDKVf)»T>c»»iirmr<n i-t 
*t mxt ) 

a «xr i 

3n Q0TCO12 

«tt a5 w ww w nc imc fw nc luc vai wish to ombc a© uihu)* 

45 IVUT M 

•» Fflttnnn iRNBcnimot 

413 ICXT 

4» WIWHK «TT IN FILE" OOTDW 

4)i ptufrorsr tic cwkctep i ww wikh otcroc- 

44i OVOTMMI) 

«3i nrwnc lds m ■fj*5 - ■ ntmwcn 

•0 WWf •JCDO OSBtXTICH TOE L ELSE f* 
4* iFwnomc 

4M QOTCCt 

S* OS BW) «> CMKTTC FV «MA WKS DBOTX 

an nrwrorritt 

s» Mwrt-i.n 

s« mamMB comfTE --.n-i," itbb 
got WVr*T0 see nu wsh evtbtx ooroat 
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CM OS WWT-t*€N RCWV TO REND Tf*£ PUSH DfTtrvx 
Clt MIN**!MUTHn 

Q» FWIlTOn I)*VU-t.N»<J> MXT 

Ml PtWTMMUT DTVM-iiMWB OMUTT 

at iimtmo set fou nr» Bngr^wn 
tmospvum-mvim 



n3im 

7J3 inHrneai* 

7MM K-*Mi 

7ML-I* 

749 IFIW<l><JI4(L>n€K7« 

7» TM»<i):irMP4na) ma mi 
7M tna-ncM7c» 

tt5Q0TO?4« 

nti irmment 

779 (0TO7J5 



tu FannTnrtimxDffixn 

b» print W Mw r* vr r otmixte- Ofwr-io tKrou. push on&r .* arnaa-i 

9m CLS-MRMWI 

m nK]>--zz22niarMi 

Ml M<I>-iBttl*j<P >-« 

MB L«l!CTU^I<m<l>.»<l>>.5mW<<2M»<l>>. •-•>iT»<23»lGMT«0»<l>.«) 

Mr prjmthkp a<i*i 

m> ira-fj-rneti'tiitr • imnr ■ urmt- • lppikt- • Lftmr • ifrwt* * cm 

M9 *XTI 

«B PRINT'LI* PtINT COfifTED' ItfVT'TO 9EE RENU. PUSH ENTER- X 

MHWffMMI 

MS P*INTT*"E MRTC PHOK • TO BE ffXCD THEN FJfTBI ntE ZZZ7 TO 4 * 

ms p«iMT-aiKE file- imn i»i> 

Mi °JMKI>-~ZZZrT)a PI- 1 Q0T01M 



MM as tmff-Df*E» mm *x> mn kuto-.y* 
IMBTA* 

Ml FVMTCri 

MM ruuiToaBia»<i>>-iBKvf>*i) 

MM IFVt>«M<H«|J. J.LBKVt)>nCM T-I 

lftM rTVMUl&KMdi.J. LDKVf3)T*J( »mn «|K 1 5 

MMKXT J 

LMtlCXT t 

1M9 in^7>oreiHT-NRr« wr Ftu*. tw€ i n* mdo w* • r» io*r 

1K7 IFT-«T>€NINPUT X IFX-tOOTOlM* ELSE* 

UMFW'-nvi 

MMM<IM»<I*1) *XTl 

MM ft*l-i 

to pain -wnefttm, • rot -mr 
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Ulft 



U3t 
1135 

am 



inULHUU 

OS WHfTTUTFVT TO DW - riLBMC IS 

qpoto-.l 
Fmn»R 

HEWD 

MM 
ntnmti). 

cum 

I. ■ [TD6 01 DISK. PUW OTTO RV rCHT IVUT X 



iim oarxa§ 



M* -F 



;. : 



121S 

m 

123* 



127» 
12M 



as Htwr*i*ur 
BfWtLPl 

ItfVTVXMKl) 

mi 

fi-i 
O05E1 

FtWTr ITWS OK «0A D1A *» OT9 FO* *fW !W X 

aom 



-MFFOTCK IN WH- 

vOV fW 9 IMP KPT 00- THT SOC CF TIC 

JER TRS-«'5 AM SLiWTLY DIFTBKMT IN DC 

MAV 1»iV M?U* 90S ONWCT0K TIC Ml iMlOf 

nomb tic disw w those wane did kit 
oi?u* nc up. com. narT » iffT «rk. mt 

INSTBV 4V WK.M1IS. BROWS* SLAW AND AN l*» 
BBS IKHDCS IMICM DID WOT WOE IN 

I KILL NO LflBEt 00 n W L£tt It OLY 
TIC IT ANjHBj CBMSF TO A Q0) 1$ USED IN IRQ. 

1 1 T>C RIOT AJU VOL SPflff TIC OffSO* EIGHT 

space to nc mir Qja fi m ST) nc oam 
mmm iocs nc assv mm one line anc fhd> 
nc aciwr. ams m stiix be printed m lbb. 
II THOUGH. ■» USDC TWWrgl FBWMH— i 

tmair for LSI mm and -oskw)* for 

nc ewT 



IS A 



hi look at newrv in l£vcl n- 
Njftpoc «e usmi cowwcs 

FOR VUU TO We 

5 •xstutt address in ««*v in bccxpvlj- 

li NBDH ADDRESS IM «0V IN KIM I 

15 IM* FOR r** TO I 

29 PRIWT N. <PG* M " OMt'^ZTf I > ) IMK1 NDCT 

mm it mis mill print an nc lew lotwtioi 
nc teem, wuc srao not ajc its hscii 

VAUC IF VOL* NMC FWIOUSLV GIVE* A T©T 

came urncur pqckinq nc cw off. vou cum 
see bits «■» rse of • preymws mam m 
— mui LOomwK nc basic us of fhk is 

■TO<»00CO" IN lO IW C IOK WWW A 
VOU OM MC PCBt GBM1 Tt « VMRPAE 

hs m ft-fCEvoaoooo* this is a oer vw to 

FIND OUT UNIT **9 PBOBV IS UP TO 



-*■ RLTUBBHl -TCIVT r FfJt LBB. li- 
ne son of nc trs-*r is kmot 

T>C tffOt L£TT CORNER IS HBRJAY LOCUTION 13X& 
TIC tfPO RSBJff 15 15423- LONE* LffT tS 1G» 

m umb t larr c nam « vrocm ss. 

OF TIC SCSSN IS AT ABOUT 13BC IT IS POSSUU 

rous nc foe came m> fvt (m <&£cm> 
omcrot, ascii or ewPHjcs at m* uxm\m oa 

T1C SOCBI Ttv THIS 

ini 



n wis sou w aj tf «m ■ nc 

cf nc $caKn Lt« Jt ""O nc cx»sob 

so it mix aot ivno vw VOU Oft NOV 

nC LOCFfTIOM UITHIN TftCSE LjlHTS 




IS CTAOIieiK TO FOB. HHM 



• 1 



I 



QffTu 
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I ■TIHC TIVI IML 1 KXVMRRD- 
T POSOfiMN. TfCOPft W- 

MDH ffftff Tire WUE W M*fTB> TO Witt ft LTOL 

I wooir imioi mould allon vou to ens 
■MM -incur hfwinq tt) sTornc 
kith an '«wr snonr mom cm w am * 
lfab. i **w twe otc* wo anna the potion 

OF THE MX HfTHDUT STOPPING fRPCRR R DKVTIOP 

HERS KM ffV VO/ d« DO JUST THRT KITWOl/T 

using T-tuQ (norm sophist iotted or exotic 

TKICXS VOU DC IT S1HPLV BV TURNING ON AND OFF 
0RRPH1C DOTS AT THE UPPER LEFT MM CORNER OF 
THE DISPLRv (VOU COULD CO IT AWttftCK ON THE 
SCTEEN. BUT n Mill NESS UR WRT RRRE MM) 

the theor* is to nm m obptwic oors at a. •> 
a.«> a* a. i). wm *e in mm positicbk 

ft. 1 AMD £ «5FGCTI%av not VOU E*CUT£ * 

PUT*". <ND SPACE BETWEEN QUOTES* THE CURSOR 
IS m LOCMIB AT PRINT POSITION ft A* TIC MB 
■RTHK DOT'S PRE "ON TF VOU HIT T)t 1EFT 

nr av. orpfhtc oot <lr> mill turn off. if 

VOU HIT THE SPREE RP*. ORRfHIC DOT aft) MILL 
TLB* OFF WD IF VOU MIT THE SPPCE ft« TNTCE 

auicnv. «apmic dot <s.b* yiu tujbi off 

WIS THE •P0ITOC.K>» 03 1— TD SB 
OF TRE OWWC DOTS IS TtACft OFT. W 
TBVOW CMS WWW BMAJCW WW jqi 
•no* of rtc oors are set mhicx n nm dcfots 

OH NHIO* OF THE KEV5 VOU PUSHED 

THE FOLLOWING IS ft SRPPU PROGRAM MMICW MILL 
DfMOMSTBjm THIS PRINCIPLE 

« BPI • LEVEL I KEYBO INTERACTIVE PW • 

a (CM • 15*. T 

BOS 



4ft PR!*", 

43 RBI • Ties IS NO SPACE BETWEEN QUOTES IN 4* 

9ft SET (Lft> ST aft) 5FT aft) 

* FOR I- 1 TO Oft NEXT I 

4* IF POINT <*ft>*J THEM P NT2B* *VQU ME VE*T 

auiac** C4t 

71 V WIRT <XR>+ T«M R AT2RR 'THE WJ 8RR 



■ft IFPOWT <i.ft>-R THOIR RTaftR. -VOU PU5HEP THE 

leh mat didn't var o 4ft 

9ft f RT2ftfti 'PUSH SPREE BRR X OR 2 Tiff 5 OR PUSH 

left flRRON K£V" G 4R 
■ RUM IT 

VOU WOULD K«f TO CDC IT KITH SOf VERV 
1NTBC5TINB VARlffTIOB ON THIS TNDC 

THIS 000 F IOO RF U HRBE5 FOR P* INTERESTING 
90HFT OF tftfrT TtC OTWTBf 0» CO IT IS 

ruost m though the cawm 1900* rh*t vou 

DID. AND UTS VOU KMEM THRT IT 006 VOU HRV 

NftNT TD OftME THE TtfCt LOOP IN lM 95 To 
OfftftE TMl LENGTH OF TIRE 0CH STRTEHBCT STRVS 
ON THE SOKE* 

THE FOLUHIMO RROORM IUUSTRMTES THIS I0ER 
EVEN FURTHER IT IS FOR LEW. I PRV RTTOfTI« 
TO IHE "PRINT RTV » »OS LISTINB- THEV HffV 

M> to m emm, to leva i prtx 

VOU m THE FR57 POVINi ftfT PUWHO THE TREE 
9OUL0 CMRME VOUR MRECTICH COf rv 49 

THE MOC ARROW 9OUL0 OffMK VOIR DIR- 
ECTION CM « DEGREES RM> RUSHING THE 7RCE BRR 
TWICE OJICW.V SHOULD JTCRS VOUR DIRECTION 
THE REHRINDCR OF THE RULES OF THI GflW£ ARE IN 
THE IKTRUCTlOe FOR THE OflPE ITSELF VQJ FUST 
TRY TO MIT THf TRRQET DOT NITN VOUR DOT 



COMP U CASE 



KARMARE / SOFTWARE / SYSTEMS INTEORATIOK3 / CUSTOM PROaRAHS 
At reaionablfl prlfl»B. Guaranteed, profaRRlonal work, dona by 
TOS-80 ProffrawRiruc exparta. Call Tor fraa astlaatafl or advic. 
on any TflS-ftO hardwara or proai imW difficulty. 



PO BOX 7011 

TACOMA.WA 98407 
(206) 759-0481 
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4 CLS 

5 PRINT* 22. "flDVWCED CflPTURE" 

7 niNT"V0U HOST ENTER THE REPULSION WO tHVISIBILlTV 
9 PRINTTfWWETERS INTO TIC COMPUTER THEV MILL DETERMINE" 
9 PRINT"T>€ SKILL LEVEL AT MHICH VOU MILL PUW T>€ LflRQER" 
IB PRINT-DC PflRflHETER, TIC MORE 01FF1CU.T IT UIU BE TO* 
U PRIKT'CflTCH THE DOT 

15 PRINVI#€N VOU WE REWV TO BEGIN TYT* IN THE LETTER L" 

16 PRINT"*© ENTER" INPUT N 
IB PRIN7"ENTER" IWUTN 



34 as 






36 PRINT'EHTEP REPULSION RANGE.* PRINT" PRINT'S - 4 NOVICE" 






3S PRINT-5 - 9 flNflTEUR' PRINT-OVER 9 PRO" INPUTV 






» as 






49 PRINT'ENTER INVISIBILITY PflHGE ■ PRINT'S - 1 NOVICE* 






42 PRINT*2 - 4 AMRTEUR" PPIMTOVER 5 PRO" INPUTO 






44 IF O1BWMNT-Q000 LUCX 1 VOU'LL NEED IT TO FIND HE * FtKNnT02fl8e NEON 


48 CLS 






» WT-6M 






188 x-e 






185 F0RJ*»1T0125 rw#»2:Sn(n.3) SET(ft47) NEXTN 






186 FQRIWT045 N-4H2 SETC3.N) SET<127.N> NEXTN 






187 (W 






1M FORM-7T09»STEP23 , 0»-1«0 P*12*<0-1V2 F0RN-8T02 5ET(N*N,P+0*: 


1 




189 SET(M*9»2«*tP*Q*5> SET(fH2?-N> P^O^I) NEXTN 5ETCH*4.P#C*3> SETCN^r^M) 


LIB SET<N*16.P*OM) 5ETCH*ie.P»0O> NEXTW 






112 fC*JM7T0eeSTEP3 F0RN**T02 SCT<IWt»4M>l©tlN NEXTH 






113 FORJWT018B5TEP92 F0*N»«TO225TEP2 SET(NHt23) NEXTN 






114 FORN-*T018STEP2 SETOWB. 17«N) NEXTN NEXTN 






115 F0RW-*T0l86STEP16 FORN-«TQ2 SET<*Ht 48) SET<N*M*& 43) 






116 SET(H*1,N»39> Sn<N+9.42*N) NEXTN NEXT* 






114 FORN«4tfT088 N*POINUN. 19> rt-PO I NT < N. 22 > N-POINT(N. 25) NEXTN 






128 fr«fCK3) B*R*><3> 03 IM IF <8-2>«B«2)G0TOL2e 






121 MS V-28 0-3* U-M 






123 PRINT8&". 5CT<1>8> SHdB) SET<3<B> 






UM IF X-4 X*l T-T*l Q0T0133 






126 .'=fl *•* E=H F -v QQSUK98 






129 RESET (K Vi 






U2 h* V*f ft- J »* 






133 IF N-2 OOT0488 


188 


ON CQ0T0182. 184. 186 


135 JWM 


182 


ON DGOTOm 189. 138 


138 P-«S<v-U>*flBSOHi> 


184 


ON WQTQL», 151. t» 


141 IF P<:Q 80T0147 


186 


ON DGOTOlSe. 193. 188 


144 SET CLE) 


188 


02 COTTJ123 


147 IF P>V Q0T0165 


189 


D«l Q0T0123 


L53 IF C*2 B-l B-D QOT0165 






156 IF D«2 8-3 ft-C QOT0163 






159 B-0 R-RNDO) OOT0165 






165 >C K-0 E-Q F-U O0SUB256 






168 RESeTCG-U- 






171 SET(E,F) M U-FC-J IHK 






172 IF N=2 Q0T0488 






174 IF POINTS 8>«1 00TQL23 






176 IF P0INT(5.8J-8 OfleS(C-4) D-flBSCD-4> GOT0123 






177 IF P0INT<3.8>«8 Q0T0194 
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191 >2 GOT0123 

191 M C0TDU3 

192 C*l GOT0123 

193 D«3 00T0123 

194 ON COOT019& 196. 288 
196 ON DGOTGlSe. 133. 188 
19« ON DGOT0192, 192. 191 
» ON DQOTO188.189.190 

258 ON JG0TQ253- 259. 256 
253 E-C-l OOT0259 

256 E-€H 

259 ON KGOTCe62.268.263 
262 F-F-l Q0TB268 

265 F»F*i 

268 W=8 

269 IF P01KT(E,F>-e W8 RETURN 
271 IF F«3 F»5:K«3 MH G0TO274 
274 IF F-47 F-45 K«i N-i 0OTO274 
277 IF E-3 t<;M *1 QDT0281 
279 IF E-127 E-125 J«l IM G0TG281 

281 !FC<H»E>»*V-Fm<(Q-E>.(lW>m«2 RETURN 

282 IF IW RETURN 

283 E«*»<115W F=RNX35>*7 

294 IF P0INT<E.F>«1 00TO28J 
285 F0BW-1T04 fl<M>-4) «EXTN 
287 IF POINT<E-i.F-l>«l fl<l>-l 
289 SET<E-LF-i> 

291 IF POItfKE^F-lMl fi<2)1 

293 SEHE*LF-1) 

295 IF P0IMT<E-t.F*l>1 fl<3>-l 
297 SET(E-1/F*1) 

299 IF PO!NT<E*LF*i>«i A<4>«1 

2? £££'* . •> «MiTWa-lf TW7 ns*. 

»i SET<E*i.F*l> 444 R»T 

2U H^f*!*™? 1 frfl » 4W ,F h0imHm ' "W* BWW * Mi. * Tim IN- 0OTW53 

» f mm !m<w w> 2 «""•»• -von* cfluwr * « ti« m • 

3«7 1FIK3>«RESET<E-LF«1> *" '~** TI PC WITS 

3*9 IF A<4)-« RESCT(E*1.FH) <S PMITI88. "i 0070188 

311 J«RND<3> M»<3> 

313 IF <J«2>»CKO00T03U 

315 RETIKN 

4«8 F0WWTO5-SET(H4fl-LV) 5ET<W-4«+L V):SET<U V4*V2) SET(KV-f*+2> 

482 SET<N^-3.V4#-3) SfT(m#>-3.V-iV3>.NEXm 

405 FOWMTOlBee NEXTN 

407 FWHMT0158 

48? N-ANDO) H<=R»(7) RESET (HHM. VHt-3) - KXTR 

412 FOWMW TO H+A 

4t5 FO»«V-3 TO V*3 

418 R£5ET(H"> NEXT* NEXTN 



422 R-T-R 

425 PRIHTW87. "IT TOOK YOU Mfc 

428 PRIMTMTt "TirC UNIT5 TO GET* 
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MCLMSIMEP 



UNCLASSIFIED 



m rs zs sarin inthfhi pub cornr- 

Ifti M/TK-NN FWAN510N IMTOinCX MUCK PAOVIDB 

SOTMNE ABDENPPNBU BAU» AWTES OHLV AL2N R9 
IBRD BOW KITH DOOJWTRTIW «€EISI» 

HUmuuts. mu so mm si ncgwv * 



THE T«-tt HAS Lft0 OS CHMCT9 HSALAV 
OVflMLlTY* l» Fflt COWTF CONVEX ICAVTO 
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